function [Esperanza , varianzaRatio] = EstudioLogNormal(ratiofund)

y=log(abs(ratiofund));
y = log(ratiofund);
%hist(y,250);
mediay = mean(y);%media de ratios
varianzay = std(y)^2;%sigma al cuadrado = deviacionEstandar^2

Esperanza = exp(mediay +varianzay/2);%sigma x^2
varianzaRatio = (exp(2*mediay+varianzay))*(exp(varianzay)-1);

fprintf('Tenemos una Esperanza de %d con una varianza de %d  =>',Esperanza,varianzaRatio);